home *** CD-ROM | disk | FTP | other *** search
/ Loadstar 94 / 094.d81 / ml 401 / ml 401.a7ae (.txt)
Encoding:
Commodore BASIC  |  1992-01-01  |  33.5 KB  |  11 lines
  1. 10 poke45,0:poke46,14:poke56,16:clr:poke53280,0:poke53281,0:print""
  2. 20 a1$="1[159]. [158][210]ead/[208]rint [205][204] 401 [212]ext":a2$="2[159].[158] [210]eturn to [204][207][193][196][211][212][193][210]"
  3. 30 sys4096,1,38,1,7,160,3:sys4096,2,37,2,6,32,0
  4. 40 print""a1$:print" "a2$
  5. 50 geta$:ifa$<>"1"anda$<>"2"then50
  6. 60 ifa$="1"thensys4480:sys51200,"","[194][193][211][201][195] [193][206][196] [203][197][210][206][193][204] [210][207][213][212][201][206][197][211]":sys4483:goto50
  7. 70 poke56,160:poke53272,23:clr
  8. 60000 a$="hello connect":open15,8,15,"r0:"+a$+"="+a$:input#15,er:close15
  9. 60010 if er<>63 then print"[147]":end
  10. 60011 poke646,peek(53281):print"[147]":sys4096+6,"hello connect",8
  11.